/*!	 historytreestore.cpp
**	 Template File
**
**	Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
**	Copyright (c) 2008 Chris Moore
**
**	This package is free software; you can redistribute it and/or
**	modify it under the terms of the GNU General Public License as
**	published by the Free Software Foundation; either version 2 of
**	the License, or (at your option) any later version.
**
**	This package is distributed in the hope that it will be useful,
**	but WITHOUT ANY WARRANTY; without even the implied warranty of
**	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
**	General Public License for more details.
**
*/

#ifdef USING_PCH
#	include "pch.h"
#else
#ifdef HAVE_CONFIG_H
#	include <config.h>
#endif

#include <synfig/general.h>

#include "trees/historytreestore.h"
#include <synfig/valuenode.h>
#include "iconcontroller.h"
#include <synfig/valuenodes/valuenode_timedswap.h>
#include <gtkmm/button.h>
#include <synfigapp/action.h>
#include "instance.h"

#include <gui/localization.h>

#endif

using namespace std;
using namespace etl;
using namespace synfig;
using namespace studio;

static HistoryTreeStore::Model& ModelHack()
{
    static HistoryTreeStore::Model* model(0);

    if (!model) {
        model = new HistoryTreeStore::Model;
    }

    return *model;
}

HistoryTreeStore::HistoryTreeStore(etl::loose_handle<studio::Instance> instance_):
    Gtk::TreeStore(ModelHack()),
    instance_(instance_)
{
    instance_->signal_undo().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_undo));
    instance_->signal_redo().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_redo));
    instance_->signal_undo_stack_cleared().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_undo_stack_cleared));
    instance_->signal_redo_stack_cleared().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_redo_stack_cleared));
    instance_->signal_new_action().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_new_action));
    instance_->signal_action_status_changed().connect(sigc::mem_fun(*this, &studio::HistoryTreeStore::on_action_status_changed));
}

HistoryTreeStore::~HistoryTreeStore()
{
    if (getenv("SYNFIG_DEBUG_DESTRUCTORS")) {
        synfig::info("HistoryTreeStore::~HistoryTreeStore(): Deleted");
    }
}

Glib::RefPtr<HistoryTreeStore>
HistoryTreeStore::create(etl::loose_handle<studio::Instance> instance_)
{
    return Glib::RefPtr<HistoryTreeStore>(new HistoryTreeStore(instance_));
}

void
HistoryTreeStore::rebuild()
{
    synfigapp::Action::Stack::const_iterator iter;

    clear();

    for (iter = instance()->undo_action_stack().begin(); iter != instance()->undo_action_stack().end(); ++iter) {
        insert_action(*(prepend()), *iter, true, true, false);
    }

    curr_row = *children().end();

    for (iter = instance()->redo_action_stack().begin(); iter != instance()->redo_action_stack().end(); ++iter) {
        insert_action(*(append()), *iter, true, false, true);
    }

    signal_undo_tree_changed()();
}

void
HistoryTreeStore::insert_action(Gtk::TreeRow row, etl::handle<synfigapp::Action::Undoable> action, bool /*is_active*/, bool is_undo, bool is_redo)
{
    assert(action);

    row[model.action] = action;
    row[model.name] = static_cast<Glib::ustring>(action->get_local_name());
    row[model.is_active] = action->is_active();
    row[model.is_undo] = is_undo;
    row[model.is_redo] = is_redo;

    synfigapp::Action::CanvasSpecific *specific_action;
    specific_action = dynamic_cast<synfigapp::Action::CanvasSpecific*>(action.get());

    if (specific_action) {
        row[model.canvas] = specific_action->get_canvas();
        row[model.canvas_id] = specific_action->get_canvas()->get_id();
    }

    etl::handle<synfigapp::Action::Group> group;
    group = etl::handle<synfigapp::Action::Group>::cast_dynamic(action);

    if (group) {
        synfigapp::Action::ActionList::const_iterator iter;

        for (iter = group->action_list().begin(); iter != group->action_list().end(); ++iter) {
            Gtk::TreeRow child_row = *(append(row.children()));
            insert_action(child_row, *iter, true, is_undo, is_redo);
        }
    }

}

void
HistoryTreeStore::on_undo()
{
    refresh();
}

void
HistoryTreeStore::on_redo()
{
    refresh();
}

void
HistoryTreeStore::on_undo_stack_cleared()
{
    Gtk::TreeModel::Children::iterator iter, next;
    Gtk::TreeModel::Children children_(children());

    for (next = children_.begin(), iter = next++; iter != children_.end(); iter = (next != children_.end()) ? next++ : next) {
        Gtk::TreeModel::Row row = *iter;

        if (row[model.is_undo]) {
            erase(iter);
        }
    }
}

void
HistoryTreeStore::on_redo_stack_cleared()
{
    Gtk::TreeModel::Children::iterator iter, next;
    Gtk::TreeModel::Children children_(children());

    for (next = children_.begin(), iter = next++; iter != children_.end(); iter = (next != children_.end()) ? next++ : next) {
        Gtk::TreeModel::Row row = *iter;

        if (row[model.is_redo]) {
            erase(iter);
        }
    }
}

void
HistoryTreeStore::on_new_action(etl::handle<synfigapp::Action::Undoable> action)
{
    Gtk::TreeRow row;
    Gtk::TreeModel::Children::iterator iter;

    for (iter = children().begin(); iter != children().end(); ++iter) {
        Gtk::TreeModel::Row row = *iter;

        if (row[model.is_redo]) {
            break;
        }
    }

    row = *insert(iter);

    insert_action(row, action);

    signal_undo_tree_changed()();
}

void
HistoryTreeStore::on_action_status_changed(etl::handle<synfigapp::Action::Undoable> action)
{
    Gtk::TreeModel::Children::iterator iter;
    Gtk::TreeModel::Children children_(children());

    for (iter = children_.begin(); iter != children_.end(); ++iter) {
        Gtk::TreeModel::Row row = *iter;

        if (action == (etl::handle<synfigapp::Action::Undoable>)row[model.action]) {
            row[model.is_active] = action->is_active();
            return;
        }
    }
}

bool
HistoryTreeStore::search_func(const Glib::RefPtr<Gtk::TreeModel>&, int, const Glib::ustring& x, const Gtk::TreeModel::iterator& iter)
{
    const Model model;

    Glib::ustring substr(x.uppercase());
    Glib::ustring name((*iter)[model.name]);
    name = name.uppercase();

    return name.find(substr) == Glib::ustring::npos;
}